home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / color.dxr / 00047.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  203 b   |  10 lines
  1. on mouseUp me
  2.   global r1, g1, b1, X, Y, squarecolor
  3.   squarecolor = "red"
  4.   r1 = 15 * Y
  5.   g1 = X * 15 / 17 * Y
  6.   b1 = g1
  7.   sprite(32).color = rgb(r1, g1, b1)
  8.   set the memberNum of sprite 61 to 205
  9. end
  10.